#pragma once

#include <iostream>
#include <string>
#include <memory>
#include <sys/select.h>
#include <sys/types.h>
#include "Log.hpp"
#include "Socket.hpp"

using namespace SocketModule;
using namespace LogModule;

#define NUM (sizeof(fd_set)*8)

const int gdefalutfd = -1;

class SelectServer
{
public:
    SelectServer(uint16_t newport)
        : _port(newport), _listen_socket(std::make_unique<TcpSocket>()), _is_running(false)
    {
    }

    void Init()
    {
        _listen_socket->BulidTcpSocket(_port);
        for (int i = 0; i < NUM; i++)
            _fd_array[i] = gdefalutfd;

        // Add listensockfd to array
        _fd_array[0] = _listen_socket->Fd();
    }

    void Start()
    {
        fd_set rfds; // 读文件描述符集
        _is_running = true;
        while (_is_running)
        {
            // 清空文件描述符集
            FD_ZERO(&rfds);
            struct timeval timeout = {5, 0}; // 超时时间
            int maxfd = gdefalutfd;

            for (int i = 0; i < NUM; i++)
            {
                if (_fd_array[i] == gdefalutfd)
                    continue;
                FD_SET(_fd_array[i], &rfds); // 包含listensockfd
                // 更新出最大值
                if (maxfd < _fd_array[i])
                    maxfd = _fd_array[i];
            }

            // 我们不能让accept来阻塞检测链接到来，而应该让select来负责进行就绪事件的检测
            int n = select(maxfd + 1, &rfds, nullptr, nullptr, &timeout);
            switch (n)
            {
            case 0:
                std::cout << "select timeout" << std::endl;
                break;
            case -1:
                perror("select");
                break;
            default:
                // 有事件就绪
                std::cout << "有事件就绪: " << timeout.tv_sec + timeout.tv_usec / 1000000.0 << std::endl;
                HandleEvents(rfds);
                break;
            }

            // InetAddr client;
            //  根据listensockfd：检测上面有没有新链接
            //  accept是阻塞的
            //  这种IO，input->listensockfd只会关心读事件就绪
            //  IO = 等待 + 拷贝
            //  是先要把listensockfd添加到select中
        }
        _is_running = false;
    }

    void HandleEvents(fd_set &rfds) // rfds就可能会有更多fd就绪
    {
        for (int i = 0; i < NUM; i++)
        {
            if (_fd_array[i] == gdefalutfd)
                continue;
            
            if(_fd_array[i] == _listen_socket->Fd())
            {
                if(FD_ISSET(_fd_array[i], &rfds))
                {
                    InetAddr client;
                    int newfd = _listen_socket->Acceptor(&client);
                    if (newfd < 0)
                        return;
                    else
                    {
                        std::cout << "获得了一个新的连接: " << newfd << ", new client: " << client.Addr() << std::endl;
                        // 添加新的fd到辅助数组
                        int pos = -1;
                        for (int j = 0; j < NUM; j++)
                        {
                            if (_fd_array[j] == gdefalutfd)
                            {
                                pos = j;
                                break;
                            }
                        }
    
                        if (pos == -1)
                        {
                            LOG(LogLevel::ERROR) << "服务器已经满了...";
                            close(newfd);
                        }
    
                        if (pos < NUM)
                        {
                            _fd_array[pos] = newfd;
                        }
                    }
                }

            }
            else
            {
                if(FD_ISSET(_fd_array[i], &rfds))
                {
                    // 处理读事件
                    char buffer[1024];
                    ssize_t n = recv(_fd_array[i], buffer, sizeof(buffer)-1, 0);
                    if(n > 0)
                    {
                        buffer[n] = '\0';
                        std::cout <<  "client# " << buffer << std::endl;
                        // 回显消息
                        std::string message = "ehco# ";
                        message += buffer;
                        send(_fd_array[i], message.c_str(), message.size(), 0); //bug
                    }
                    else if(n == 0)
                    {
                        LOG(LogLevel::DEBUG) << "客户端退出链接, sockfd: " << _fd_array[i];
                        close(_fd_array[i]);
                        _fd_array[i] = gdefalutfd; 
                    }
                    else
                    {
                        LOG(LogLevel::DEBUG) << "客户端读取链失败, sockfd: " << _fd_array[i];
                        close(_fd_array[i]);
                        _fd_array[i] = gdefalutfd; 
                    }
                }
            }
        }
    }

    ~SelectServer()
    {
    }

private:
    uint16_t _port;
    std::unique_ptr<Socket> _listen_socket;
    bool _is_running;
    int _fd_array[NUM];
};